i4mat_transpose_print Subroutine

subroutine i4mat_transpose_print(m, n, a, title)

************80

I4MAT_TRANSPOSE_PRINT prints an I4MAT, transposed.

Arguments

Type	Intent	Optional	Attributes		Name
integer(kind=4)				::	m
integer(kind=4)				::	n
integer(kind=4)				::	a(m,n)
character(len=*)				::	title